﻿Imports NUnit.Framework


<TestFixture()>
Public Class DefaultValueTests

    <SetUp()>
    Public Sub SetUp()

    End Sub

    <TearDown()>
    Public Sub TearDown()

    End Sub

    <Test()>
    Public Sub DefaultIntegerValueTest()
        Dim query As String = IO.File.ReadAllText("Queries/default_int.sql")
        Dim analyzer As New SqlAnalyzer(query)

        Assert.IsNotNull(analyzer("@myvariable"))
        Assert.AreEqual("1234", analyzer("@myvariable").DefaultValue)
    End Sub


End Class
